Meteo Module

History

current version 1.1 - 2nd February 2023

version	date	comment
1.0	17/Oct/2017	Original code
1.1	02/Feb/2023	added subroutine to export point data

License

license: GNU GPL http://www.gnu.org/licenses/

Module Description

Module to manage meteorological forcings

Uses

Variables

Type	Visibility	Attributes		Name		Initial
logical,	public		::	demHiResRequired	=	.FALSE.
integer(kind=short),	public		::	dtMeteo
integer(kind=short),	private		::	fileUnitPointPrecipitation
integer(kind=short),	private		::	fileUnitPointRH
integer(kind=short),	private		::	fileUnitPointRadiation
integer(kind=short),	private		::	fileUnitPointTemperature
integer(kind=short),	private		::	fileUnitPointWS
type(IniList),	private		::	meteoini
type(ObservationalNetwork),	private		::	sites
type(ObservationalNetwork),	private		::	sitesPrecipitation
type(ObservationalNetwork),	private		::	sitesRH
type(ObservationalNetwork),	private		::	sitesRadiation
type(ObservationalNetwork),	private		::	sitesTemperature
type(ObservationalNetwork),	private		::	sitesWS
integer(kind=short),	private		::	timeIncrementSites
type(DateTime),	private		::	timePointExport

Subroutines

public subroutine MeteoInit(inifile, tstart, mask, dem, dem_loaded, albedo_loaded)

Initialize meteorological forcings

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	inifile	name of configuration file
type(DateTime),	intent(in)			::	tstart	initial time
type(grid_integer),	intent(in)			::	mask	defines interpolation extent
type(grid_real),	intent(in)			::	dem	digital elevation model to be used to modify interpolated data
logical,	intent(in)			::	dem_loaded	true if dem has been loaded
logical,	intent(in)			::	albedo_loaded	true if dem has been loaded

public subroutine MeteoPointInit(pointfile, path_out, time)

Initialize export of point site data

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	pointfile	file containing coordinate of points
character(len=*),	intent(in)			::	path_out	path of output folder
type(DateTime),	intent(in)			::	time	start time

public subroutine MeteoRead(time, dem, albedo)

Read meteorological forcings

Arguments

Type	Intent	Optional	Attributes		Name
type(DateTime),	intent(in)			::	time	current time
type(grid_real),	intent(in),	optional		::	dem	used to apply drift of station data
type(grid_real),	intent(in),	optional		::	albedo	used to apply drift of radiation site data

private subroutine MeteoPointExport(time)

Export of point site data

Arguments

Type	Intent	Optional	Attributes		Name
type(DateTime),	intent(in)			::	time